home *** CD-ROM | disk | FTP | other *** search
/ SPACE 1 / SPACE - Library 1 - Volume 1.iso / apps / 408 / xarg.c < prev   
C/C++ Source or Header  |  1990-07-04  |  1KB  |  59 lines
  1. /*
  2.  * xarg.c
  3.  * 10/10/88
  4.  * Beispielimplementation (in Turbo C) eines Programms, das per
  5.  * xArg Argumente annimmt, inklusive Legalitätschecks.
  6.  */
  7.  
  8. #include <tos.h>
  9. #include <stdio.h>
  10. #include <stdlib.h>
  11. #include <string.h>
  12.  
  13. typedef struct
  14. {
  15.     char        xarg_magic[4];    /* "xArg" == 0x78417267L            */
  16.     int        xargc;        /* Wie argc in main()            */
  17.     char        **xargv;        /* Wie argv in main()            */
  18.     char        *xiovector;    /* Unbenutzt                    */
  19.     BASPAG    *xparent;        /* Zeigt auf die Basepage des Auf- */
  20.                         /* rufers. Typdeklaration in tos.h */
  21. } XARG;
  22.  
  23. main(void)
  24. {
  25.     extern BASPAG *_BasPag;    /* definiert in TCSTART.O */
  26.     XARG    *xarg;
  27.     char *xenv;
  28.     unsigned long x;
  29.     int i;
  30.     
  31.     if ((xenv=getenv("xArg"))!=NULL)
  32.     {
  33.         x = strtoul(xenv,NULL,16);
  34.         printf("xArg structure at %08lX\n",x);
  35.         if ((x!=0) && (x%2==0))
  36.         {
  37.             xarg = (XARG *)x;
  38.             if (!strncmp(xarg->xarg_magic,"xArg",4))
  39.             {
  40.                 if (xarg->xparent == _BasPag->p_parent)
  41.                 {
  42.                     /* alles ok. Argumente verarbeiten */
  43.                     for (i=0; i<xarg->xargc; ++i)
  44.                         printf("%d: %s\n",i,xarg->xargv[i]);
  45.                 }
  46.                 else
  47.                     printf("xArg parent != my parent\n");
  48.             }
  49.             else
  50.                 printf("xArg magic number not found\n");
  51.         }
  52.         else
  53.             printf("illegal xArg address (0 or odd)\n");
  54.     }
  55.     else
  56.         printf("xArg not in environment\n");
  57.     return 0;
  58. }
  59.